home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / program / p063b9s.zip / UNIT / USE32.PAS < prev    next >
Pascal/Delphi Source File  |  1996-08-14  |  434b  |  29 lines
  1. unit Use32;
  2.  
  3. interface
  4.  
  5. {$IFDEF USE16}
  6.   {$UNDEF USE32}
  7. {$ENDIF}
  8.  
  9. type
  10. {$IFDEF USE32}
  11.   Integer    = System.Longint;
  12.   Word       = System.Longint;
  13. const
  14.   MaxInt     = MaxLongint;
  15. {$ELSE}
  16.   SmallInt   = System.Integer;
  17.   SmallWord  = System.Word;
  18. {$ENDIF}
  19. type
  20.   PByte      = ^Byte;
  21.   PWord      = ^Word;
  22.   PLongint   = ^Longint;
  23.   PSmallInt  = ^SmallInt;
  24.   PSmallWord = ^SmallWord;
  25.  
  26. implementation
  27.  
  28. end.
  29.